10 REM COPYRIGHT 1987 COMPUTE! PUBLICATIONS INC. - ALL RIGHTS RESERVED 20 POKE53269,0:SP=53248:N=54272:SP$=" ":POKE53281,6:POKE53280,10 30 PRINT"[147][150] COPYRIGHT 1987 COMPUTE! PUB., INC. "; 40 PRINT" ALL RIGHTS RESERVED [146][155]"; 50 DIMST$(50),CA$(50),NB$(50),AB(50),PK(50),A$(50),SX(50),SY(50),CP(50),ST(50) 60 C=C+1:IFC=49THEN80 70 READST$(C):READCA$(C):READSX(C):READSY(C):READNB$(C):GOTO60 80 FOR X=13*64 TO 15*64-1:POKE X,0:NEXT X 81 FORX=842TO881:READA:POKEX,A:NEXTX 90 FORX=906TO945:READA:POKEX,A:NEXTX 100 FORX=970TO1009:READA:POKEX,A:NEXTX 110 POKE2040,13:POKE2041,14:POKESP+28,3 120 POKE53285,10:POKE53288,2:POKE53287,9:POKESP+16,0 130 POKESP,120:POKESP+1,170:POKESP+2,240:POKESP+3,170:POKE53269,3:XZ=-1 140 PRINTTAB(214)"CHOOSE ONE:"SPC(68)"1 - BOUNTY HUNTER"SPC(63)"2 - COUNT DOWN 150 [153][163]247)"BOUNTY HUNTER"[166]6)"CROOK" 160 [161]A$:R[178][187](1):[139]A$[179]"1"[176]A$[177]"2"[167]160 170 F[178][197](A$):[139]F[178]1[167]210 180 [151]SP[170]3,250:[153]"LOAD"[163]253)"MINUTES (1-5)" 190 [161]A$:[139]A$[179]"1"[176]A$[177]"5"[167]190 200 SC[178][197](A$):SC[178]SC[172]60[170]1 210 [153]"LOAD"[163]215)"CHOOSE ONE:"[166]69)"1 - STATES"[166]70)"2 - CAPITALS" 220 [161]A$:[139]A$[179]"1"[176]A$[177]"2"[167]220 230 [139]A$[178]"1"[167]250 240 [129]X[178]1[164]48:ST$(X)[178]CA$(X):[130]X 250 [153]"LOAD"[166]214)"1 - VISIBLE "[166]68)"2 - INVISIBLE 260 GETA$:IFA$<"1"ORA$>"2"THEN260 270 E=VAL(A$):IFF=2THEN1480 280 PRINTTAB(93)"DIFFICULTY (1-3) 290 RC[178][181](48[172][187](1))[170]1:RR[178]RC 300 [161]A$:[139]A$[179]"1"[176]A$[177]"3"[167]300 310 B[178][197](A$):B[178]4[171]B:[151]SP[170]1,250:[151]SP[170]3,250 320 [153]"LOADOPEN"[163]205)"THE CROOK IS IN "ST$(RC):[129]X[178]1[164]2000:[130]X 330 [137]1480 340 [153]"LOADOPEN";:[151]SP[170]3,250 350 SX(18)[178]290:SY(18)[178]173:SX(19)[178]275:SY(19)[178]70:SX(20)[178]290:SY(20)[178]140 360 SX(21)[178]280:SY(21)[178]106:SX(22)[178]285:SY(22)[178]200 370 [139]E[178]2[167]630 380 [153]" (null)USRUSRUSRUSRUSRUSR(null)(null)USRUSRUSRUSRUSRUSRUSRUSRUSRUSRUSRUSR(null)USRUSRUSRUSRUSRUSR(null)USRUSRUSRUSR(null) 390 PRINT"[207][146][223] [180][205] [180] [170] [146][169] 400 [153]"SGN SGN SGN SGN + WAITSTEP 410 PRINT"[207][205][175][175][175][206][183][183][180] [205][175][175][175][175][175][175][175][175][175][175][175][207][183][183][183][183][183][183][183][180] [146] 420 [153]"SGN SGN SGN SGN SGN (null) 430 PRINT"[180] [180] [180] [180] [180] [223] 440 [153]"(null)ANDANDANDANDANDANDAND(null)ANDANDANDANDSGN (null)ANDANDANDANDANDAND (null)USRUSRUSRUSRUSRUSR 450 PRINT"[180] [170] [180] [180] [180] [205][180] [208] 460 [153]"SGN + SGN (null)ANDANDANDANDANDANDANDAND(null)AND (null) + 470 PRINT"[180] [170] [180] [180] [180] [170] [146] 480 [153]"SGN + SGN SGN (null)ANDANDANDANDANDSQRUSRUSRUSRUSRUSRUSR 490 PRINT"[180] [205] [180] [180] [180] [205] [146] 500 [153]"(null) (null) SGN SGN SGN + WAIT 510 PRINT" [223] [205] [180] [180] [180] [170] [223] 520 [153]" (null) (null)(null)USRUSRUSRUSRUSRUSR(null)USRUSRUSRUSRUSRUSR(null)USRUSRUSRUSRUSRUSRUSRUSRUSR(null)ANDANDANDANDANDAND 530 PRINT" [223] [205] [180] [170][183][183][183][180] [180] [146][169] 540 [153]" (null) (null) SGN + (null) SGN " 550 [153]" (null) SGN + USRUSRUSRUSRUSRSGN WAIT 560 PRINT" [223] [180][175][175][175][175][175][175][186] [207][183][183][183][183][183] 570 [153]"MOVE?OPEN (null) (null)WAIT (null) SGN WAIT 580 PRINT" [223] [180]  [146][169] 590 [153]"DEF(null)USRUSRUSRUSRUSRUSRUSRUSRUSRUSR(null)OPEN SYSSCORE:OPEN(null) (null) WAIT 600 PRINT"[150][180] [170][159] [223][169][223] [146][169] [223][223] 610 [153]"DEFSGN +OPEN (null) WAITSTEP (null)(null)WAIT"; 620 [153]"DEF(null)ANDANDANDANDANDANDANDANDANDANDSQROPEN (null)STEP"; 630 [139]F[178]2[167][141]2740:[153]LA; 640 [139]F[178]2[176]RC[177]22[167]670 650 [139]SX(RC)[177]255[167]K[178]255:[151]SP[170]16,3:CX[178]2 660 [151]SP[170]2,SX(RC)[171]K:[151]SP[170]3,SY(RC):K[178]0 670 [141]1590:[137]1010 680 [153]"LOAD";:[151]SP[170]3,250 690 SX(18)[178]57:SY(18)[178]174:SX(19)[178]40:SY(19)[178]55:SX(20)[178]60:SY(20)[178]138 700 SX(21)[178]44:SY(21)[178]93:SX(22)[178]57:SY(22)[178]205:[139]E[178]2[167]960 710 [153]" WAITSTEP (null)USR 720 PRINT" [206] [205][175] [223][146]MOVE?[159] [169] [146] 730 [153]" SGN (null)(null)WAIT STEP (null)WAIT SGN SGN SGN+ (null) 740 PRINT" [205] [146]  [146][169] [180] [180] [180][170] [146][169] 750 [153]"USRUSRUSRUSRUSRUSRUSRSGN WAIT  WAIT STEP SGN(null) (null) 760 PRINT" [204] [146]  [146] [169] [207][183][183] [146] 770 [153]"(null) (null)USRUSRUSRWAIT USRUSR(null)USR(null)WAIT STEPUSR(null)USRUSRUSRUSRUSRUSRUSR(null) (null)USR(null)(null)(null)WAITFN 780 PRINT"  [180] [180] [180] [180] [206][205][180] [170] [146] 790 [153]" ANDANDANDANDANDAND(null) SGN SGN (null)(null)ANDANDANDANDANDANDAND(null) 800 PRINT" [223] [205] [180] [204] [206] [204][175][175][175] [170] [223] 810 [153]" (null) (null) SGN (null) (null)AND(null) (null) (null)(null)SGNUSR(null) 820 PRINT"  [180] [204][206] [205][175][175][206][183] [183][183][208][146] [158]SCORE:[159] 830 [153]"  (null)AND(null) (null) TO + 840 PRINT"  [206] [162][184][183][183][183][183][183][183][206][183][183][183][183][183][183][183][183][183][183] 850 [153]" (null)(null)(null)(null)(null)(null)(null)USRUSR (null) WAIT 860 PRINT"  [206][183][183][183][183][207][183][183][183][183][207][183][183][207][183][183][205][175][175][175][175] [146] 870 [153]"  SGN SGN SGN (null) (null)WAITSTEP 880 PRINT"  [180] [180] [180] [183][205][175] [146][169] 890 [153]" ANDANDANDANDANDSGN SGN SGN (null) WAITSTEP 900 PRINT" [180] [180] [180] [180] [205][146][169][150][207][183][183][183][183][183][183][183][183][183][183][208][159]"; 910 PRINT" [180] [206] [180] [175][175][175][204][175][175][175][175][175][175][175][146][169] [150][180] [170][159]"; 920 PRINT" [169] [183][183][183][208] [180] [180] [223][146] [150][180] [170][159]"; 930 PRINT"  [223][146] [223] [146] [223] [146] [150][204][175][175][175][175][175][175][175][175][175][175][186][159]"; 940 PRINT" [223][223][146] [223] [223] 950 [153]" (null) (null) (null)WAIT"; 960 CX[178]0:[151]SP[170]16,0:[139]F[178]2[167][141]2740:[153]LA; 970 [139]F[178]2[176]RC[179]18[167]1000 980 [139]SX(RC)[177]255[167]K[178]255:[151]SP[170]16,2:CX[178]2 990 [151]SP[170]2,SX(RC)[171]K:[151]SP[170]3,SY(RC):K[178]0 1000 [141]1590 1010 [139]MP[178]1[167]YY[178]20:XX[178]0:[141]2450:[153]SP$:[153]"ON"; 1020 [139]MP[178]2[167][153]""[163]60)SP$:[153]""[163]60); 1030 Y[178]0:R1[178]R 1040 [139]AN$[179][177]""[167]DA[178]1 1050 [139]G[178]1[167]G[178]0:[137]1360 1060 AN$[178]"" 1070 [139]DA[178]1[167][142] 1080 [139]F[178]2[167]2610 1090 [137]2120 1100 [139]Y[177]0[167]1200 1110 [139]A$[179][177]" "[167]1180 1120 [139]XZ[177][195](NB$(R))[171]2[167]XZ[178][171]1 1130 XZ[178]XZ[170]2:NM$[178][202](NB$(R),XZ,2):NM[178][197](NM$):[153]ST$(NM):X[178]0 1140 X[178]X[170]1 1150 [161]A$:[139]A$[178][199](13)[167]AN$[178]ST$(NM):G[178]1:[141]2810:[137]1170 1160 [139]X[179]30[167]1140 1170 DA[178]1:[137]1010 1180 [139]A$[179][177][199](13)[167]1200 1190 [153]""ST$(HM):[129]X[178]1[164]200:[130]X:[137]1010 1200 [139]A$[178]" "[175]A$(Y)[178]" "[167][142] 1210 [139]A$[179][177]""[167]1270 1220 [139]R[179]18[176]R[177]22[167]1270 1230 [151]SP[170]1,250:[151]SP[170]3,250:DA[178]1 1240 [139]MP[178]1[167]MP[178]2:[137]1260 1250 MP[178]1 1260 [145]MP[137]340,680 1270 [139]A$[178][199](13)[167]1330 1280 [139]A$[178][199](20)[175]Y[178]0[167][142] 1290 [139]A$[178][199](20)[167][153]"CMD CMD";:A$(Y)[178]"":Y[178]Y[171]1 1300 [139](A$[179]"A"[176]A$[177]"Z")[175]A$[179][177]" "[175]A$[179][177]"."[167][142] 1310 [139]Y[178]14[167][142] 1320 [153]A$;:Y[178]Y[170]1:A$(Y)[178]A$:[142] 1330 [141]2810 1340 [139]A$(Y)[178]" "[167]Y[178]Y[171]1 1350 [129]X[178]1[164]Y:AN$[178]AN$[170]A$(X):A$(X)[178]"":[130]X 1360 ZY[178][195](NB$(R)) 1370 ZZ[178][171]1 1380 ZZ[178]ZZ[170]2 1390 MI$[178][202](NB$(R),ZZ,2):MI[178][197](MI$) 1400 [139]AN$[178]ST$(MI)[167]R[178]MI:[137]1500 1410 [139]ZZ[179]ZY[170]1[167]1380 1420 P[178]0 1430 [129]ZX[178]1[164]48:[139]AN$[178]ST$(ZX)[167]P[178]1 1440 [130]ZX 1450 U[178]2:W[178]10 1460 [139]P[178]1[167][141]2810:[153]"SYS NOT A CMDCMDCMDCMDCMDCMDCMDCMDNEIGHBOROPEN";:[141]2840:[137]1010 1470 [141]2810:[153]"SYSTRY AGAINOPEN";:[141]2840:[137]1010 1480 R[178][181](48[172][187](1))[170]1:R1[178]R:[139]R[178]RC[167]1480 1490 HM[178]R:TE[178][181](TI[173]60) 1500 [139]MP[178]1[175]R[179]23[167]670 1510 [139]MP[178]2[175]R[177]17[167]1000 1520 [151]SP[170]1,250:[151]SP[170]3,250 1530 [139]R[179]18[176]R[177]22[167]1560 1540 [139]RC[177]22[167]MP[178]2:[137]680 1550 MP[178]1:[137]340 1560 [139]R[177]22[167]MP[178]2:[137]680 1570 [139]R[179]23[167]MP[178]1:[137]340 1580 [139](MP[178]1[175]RC[177]22)[176](MP[178]2[175]RC[179]18)[167][151]SP[170]3,250 1590 [139]SX(R)[179]256[167]BX[178]0 1600 [139]SX(R)[177]255[167]BX[178]1 1610 [139]F[178]1[167]1660 1620 [139]ST(R)[178]0[167]ST(R)[178]1:LA[178]LA[170]1:[141]2740:[153]LA;:[137]1660 1630 [139]MP[178]1[167]XX[178]2:YY[178]22 1640 [139]MP[178]2[167]XX[178]29:YY[178]20 1650 [141]2450:[153]"SYSALREADYCMDCMDCMDCMDCMDCMDCMDCHOSENOPEN";:U[178]3:W[178]13:[141]2840 1660 [139]SX(R)[177]255[167]X2[178]255 1670 [151]SP[170]1,250 1680 [151]SP,SX(R)[171]X2:X2[178]0:[151]SP[170]16,BX[170]CX:[151]SP[170]1,SY(R) 1690 [139]F[178]1[167][141]2740:[153]" CMDCMDCMDCMDCMDCMDCMD$"10000[171]J; 1700 [139]EA[178]1[175]R[178]HM[167][141]2520 1710 [139]SA[178]1[176]R[179][177]RC[167][142] 1720 [141]2810:[153]"SYS GOT HIM!":U[178]5:W[178]80:[141]2840:[129]L[178]1[164]100:[130]L 1730 [141]2810:[153]" GO HOME!OPEN"; 1740 [151]2041,15:EA[178]1:R8[178]1:R9[178]1:MA[178]1:SA[178]1:[151]SP[170]3,250:[142] 1750 [131]WASHINGTON,OLYMPIA,45,55,0702,IDAHO,BOISE,95,83,010705041009 1760 [131]SOUTH DAKOTA,PIERRE,223,80,061904122105 1770 [131]WYOMING,CHEYENNE,155,93,020503121110,MONTANA,HELENA,140,58,02040603 1780 [131]NORTH DAKOTA,BISMARCK,220,55,051903,OREGON,SALEM,45,83,01080902 1790 [131]CALIFORNIA,SACRAMENTO,30,125,070913 1800 [131]NEVADA,CARSON CITY,70,125,0807021013 1810 [131]UTAH,SALT LAKE CITY,113,125,090204111413 1820 [131]COLORADO,DENVER,170,135,10131417161204 1830 [131]NEBRASKA,LINCOLN,230,112,040321201611 1840 [131]ARIZONA,PHOENIX,105,175,0809101114 1850 [131]NEW MEXICO,SANTA FE,165,175,1310111715,TEXAS,AUSTIN,226,195,14171822 1860 [131]KANSAS,TOPEKA,235,140,11122017 1870 [131]OKLAHOMA,OKLAHOMA CITY,247,165,111620181514 1880 [131]ARKANSAS,LITTLE ROCK,57,174,172042442215 1890 [131]MINNESOTA,ST. PAUL,40,55,06032124 1900 [131]MISSOURI,JEFFERSON CITY,60,138,1612212741421817 1910 [131]IOWA,DES MOINES,44,93,120319242720,LOUISIANA,BATON ROUGE,57,205,151844 1920 [131]MICHIGAN,LANSING,132,75,242526,WISCONSIN,MADISON,90,75,19232721 1930 [131]INDIANA,INDIANAPOLIS,122,110,23272641,OHIO,COLUMBUS,153,110,2541402328 1940 [131]ILLINOIS,SPRINGFIELD,92,115,2124254120 1950 [131]PENNSYLVANIA,HARRISBURG,215,100,264038362937 1960 [131]NEW YORK, ALBANY,238,80,2836353330,VERMONT,MONTPELIER,267,70,293331 1970 [131]NEW HAMPSHIRE,CONCORD,285,65,333032,MAINE,AUGUSTA,305,55,31 1980 [131]MASSACHUSETTS,BOSTON,287,85,2930313534 1990 [131]RHODE ISLAND,PROVIDENCE,290,100,3335 2000 [131]CONNECTICUT,HARTFORD,270,97,293334,NEW JERSEY,TRENTON,255,105,292837 2010 [131]DELAWARE,DOVER,252,118,382836 2020 [131]MARYLAND,ANNAPOLIS,228,118,37284039 2030 [131]VIRGINIA,RICHMOND,218,133,3840414243 2040 [131]WEST VIRGINIA,CHARLESTON,178,125,2628383941 2050 [131]KENTUCKY,FRANKFORT,138,135,20272526403942 2060 [131]TENNESSEE,NASHVILLE,140,153,1820413943474644 2070 [131]NORTH CAROLINA,RALEIGH,218,156,42394547 2080 [131]MISSISSIPPI,JACKSON,98,185,22184246 2090 [131]SOUTH CAROLINA,COLUMBIA,228,180,4743 2100 [131]ALABAMA,MONTGOMERY,138,185,44424748 2110 [131]GEORGIA,ATLANTA,185,190,4642434548,FLORIDA,TALLAHASSEE,180,216,4746 2120 RR[178]RC:[139]EA[178]1[167]V3[178]2000 2130 [129]X1[178]1[164][195](NB$(RR))[169]2 2140 [161]A$:[139]A$[179][177]""[167][153]" CMD";:[141]1100 2150 M$[178][202](NB$(RR),X1,2):M[178][197](M$):R8[178]1:R9[178]1 2160 V1[178][182](SY(R)[171]SY(M)) 2170 [139]EA[178]0[175](RC[179]18[176]RC[177]22)[167]R8[178][181](3[172][187](1))[170]1:R9[178][181](2[172][187](1))[170]1 2180 [139]MP[178]1[175]M[177]22[167]V[178]255[171]SX(R)[170]SX(M):[137]2210 2190 [139]MP[178]2[175]M[179]18[167]V[178]SX(R)[170]255[171]SX(M):[137]2210 2200 V[178][182](SX(R)[172]R8[171]SX(M)[172]R9) 2210 [129]XY[178]1[164][195](NB$(R))[169]2 2220 MN$[178][202](NB$(R),XY,2):MN[178][197](MN$) 2230 [139]MN[178]M[167]V[178]V[171]1000 2240 [161]A$:[139]A$[179][177]""[167][153]" CMD";:[141]1100 2250 [130]XY 2260 [153]" WAITCMD"; 2270 V2[178]V[170]V1:[139]V2[179]0[167]V2[178][181](4[172][187](1)) 2280 [139]EA[178]0[167]2310 2290 [139]V2[179]V3[167]V3[178]V2:RD[178]M 2300 [137]2320 2310 [139]V2[177]V3[167]V3[178]V2:RD[178]M 2320 [130]X1 2330 D[178]D[170]1:[139]D[179]B[167]2120 2340 [161]A$:[139]A$[179][177]""[167][153]" CMD";:[141]1100 2350 D[178]0:RC[178]RD:[153]" CMD";:V3[178]0 2360 [139]MA[178]1[175]EA[178]1[167]RC[178][181](48[172][187](1))[170]1:KC[178]RC:MA[178]0 2370 [151]SP[170]3,250 2380 [139]EA[178]0[167]J[178]J[170]100:U[178]1:W[178]40:[141]2840 2390 [139](MP[178]1[175]RC[177]22)[176](MP[178]2[175]RC[179]18)[167]2120 2400 [139]SX(RC)[179]256[167]CX[178]0 2410 [139]SX(RC)[177]255[167]CX[178]2:X3[178]255 2420 [151]SP[170]16,BX[170]CX:[151]SP[170]2,SX(RC)[171]X3:X3[178]0:[151]SP[170]3,SY(RC) 2430 [139]SA[178]1[175]RC[178]R[167][141]2570 2440 [137]2120 2450 [151]781,YY:[151]782,XX:[151]783,48:[158]65520:XX[178]0:YY[178]0:[142] 2460 [131]168,0,2,170,0,10,170,128,042,170,160,41,85,160,41,221,160,101,17,100 2470 [131]101,101,100,21,101,80,21,85,80,21,1,80,5,69,64,1,85,0,0,84,252,0,3,255 2480 [131]0,15,223,192,61,85,240,61,85,240,63,223,240,127,255,244,117,237,116,53 2490 [131]101,112,52,204,112,7,3,64,3,87,0,0,84,0,0,16,84,0,1,85,0,13,85,192,61 2500 [131]85,240,61,85,240,63,223,240,127,255,244,117,237,116,53,101,112,61 2510 [131]221,240,15,3,192,15,84,192,3,223,0,0,252 2520 [141]2810:[153]"SYS YOU WIN!";:X[178]X[170]1:U[178]1:W[178]70:[141]2840:[139]X[179]20[167]2520 2530 [141]2810:[153]"PRESS ANYCMDCMDCMDCMDCMDCMDCMDKEY"; 2540 [151]198,0 2550 [161]A$:[139]A$[178]""[167]2550 2560 [138] 2570 [141]2810:[153]"SYS GOT YOU!";:U[178]3:W[178]15:[141]2840:[151]SP[170]21,2 2580 [139]J[179]10000[167][141]2740:[153]" CMDCMDCMDCMDCMDCMD 0"; 2590 [129]X[178]1[164]1500:[130]X 2600 [137]2530 2610 [151]SP[170]3,250 2620 [161]A$:TM[178]SC[171]([181](TI[173]60)[171]TE) 2630 [139]MP[178]1[167][153]""[163]28); 2640 [139]MP[178]2[167][153]""[163]30); 2650 [153]"TIME:"TM"CMD "; 2660 [139]TM[178]0[167]2760 2670 [139]MP[178]1[167][153]""[163]Y); 2680 [139]MP[178]2[167][153]""[163]20[170]Y); 2690 [139]RA[179]4[167][153]" WAITCMD";:RA[178]RA[170]1:[137]2710 2700 [153]" CMD";:RA[178]0 2710 [139]A$[178]""[167]2620 2720 [153]" CMD";:[141]1100 2730 [137]2610 2740 [139]MP[178]1[167]XX[178]13:YY[178]23:[141]2450:[142] 2750 XX[178]33:YY[178]13:[141]2450:[142] 2760 [139]MP[178]1[167]XX[178]1:YY[178]22 2770 [139]MP[178]2[167]XX[178]29:YY[178]20 2780 [141]2810:[153]"SYSTIME IS UP" 2790 WX[178]WX[170]1:U[178]1:W[178]15:[141]2840:[139]WX[179]15[167]2780 2800 [137]2530 2810 [139]MP[178]1[167]XX[178]1:YY[178]22:[137]2830 2820 XX[178]29:YY[178]20 2830 [141]2450:[153]" CMDCMDCMDCMDCMDCMDCMDCMDCMDCMD ONCMDCMDCMDCMDCMDCMDCMDCMDCMDCMD";:[142] 2840 [129]S[178]1[164]U:[151]N[170]24,15:[151]N[170]6,247:[151]N[170]4,17:[151]N[170]1,W 2850 [129]Q[178]1[164]30:[130]Q:[151]N[170]4,16:[130]S:[142]